home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / db / esm-3.1 / esm-3 / usr / local / sm / src / serverlib / thread / dispatch.c < prev    next >
Encoding:
C/C++ Source or Header  |  1996-05-05  |  3.0 KB  |  122 lines
  1. /*
  2.  *   $RCSfile: dispatch.c,v $  
  3.  *   $Revision: 1.1.1.1 $  
  4.  *   $Date: 1996/05/04 21:55:59 $      
  5.  */ 
  6. /**********************************************************************
  7. * EXODUS Database Toolkit Software
  8. * Copyright (c) 1991 Computer Sciences Department, University of
  9. *                    Wisconsin -- Madison
  10. * All Rights Reserved.
  11. *
  12. * Permission to use, copy, modify and distribute this software and its
  13. * documentation is hereby granted, provided that both the copyright
  14. * notice and this permission notice appear in all copies of the
  15. * software, derivative works or modified versions, and any portions
  16. * thereof, and that both notices appear in supporting documentation.
  17. *
  18. * THE COMPUTER SCIENCES DEPARTMENT OF THE UNIVERSITY OF WISCONSIN --
  19. * MADISON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS" CONDITION.  
  20. * THE DEPARTMENT DISCLAIMS ANY LIABILITY OF ANY KIND FOR ANY DAMAGES
  21. * WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
  22. *
  23. * The EXODUS Project Group requests users of this software to return 
  24. * any improvements or extensions that they make to:
  25. *
  26. *   EXODUS Project Group 
  27. *     c/o David J. DeWitt and Michael J. Carey
  28. *   Computer Sciences Department
  29. *   University of Wisconsin -- Madison
  30. *   Madison, WI 53706
  31. *
  32. *     or exodus@cs.wisc.edu
  33. *
  34. * In addition, the EXODUS Project Group requests that users grant the 
  35. * Computer Sciences Department rights to redistribute these changes.
  36. **********************************************************************/
  37.  
  38. #include "sysdefs.h"
  39. #include "ess.h"
  40. #include "checking.h"
  41. #include "trace.h"
  42. #include "error.h"
  43. #include "list.h"
  44. #include "tid.h"
  45. #include "io.h"
  46. #include "lock.h"
  47. #include "object.h"
  48. #include "msgdefs.h"
  49. #include "thread.h"
  50. #include "semaphore.h"
  51. #include "latch.h"
  52. #include "bitvec.h"
  53. #include "link.h"
  54. #include "msgvector.h"
  55. #include "thread_funcs.h"
  56. #include "thread_globals.h"
  57. #include "msg_globals.h"
  58.  
  59.  
  60.  int
  61. dispatch (
  62.  
  63.     int                threadState 
  64. )
  65. {
  66.  
  67.     register TCB    *tcb;
  68.  
  69.  
  70.     TRPRINT(TR_THREAD, TR_LEVEL_1, ("threadState:%d", threadState));
  71.  
  72.     /* attempt to get a thread off the ready queue */
  73.     if ((tcb = (TCB *) listDeq( &ReadyList )) == NULL)    {
  74.  
  75.         TRPRINT(TR_THREAD, TR_LEVEL_2, ("ready list empty"));
  76.  
  77.         /*
  78.          *    get a thread off the free list
  79.          */
  80.         if ((tcb = (TCB *) listDeq( &FreeList )) == NULL)    {
  81.  
  82.             TRPRINT(TR_THREAD, TR_LEVEL_2, ("getting spare thread"));
  83.  
  84.             /*
  85.              *    check to see if there is a spare thread
  86.              */
  87.             if (tcb = Spare)    {
  88.  
  89.                 TRPRINT(TR_THREAD, TR_LEVEL_2, ("using spare:%d", tcb->id));
  90.  
  91.                 /*
  92.                  *    mark the spare as used
  93.                  */
  94.                 Spare = NULL;
  95.                 SelectMask = DiskMask;
  96.                 SelectRestrict = TRUE;
  97.  
  98.             } else {
  99.  
  100.                 SM_ERROR(TYPE_FATAL, esmINTERNAL);
  101.             }
  102.         }
  103.     }
  104.     TRPRINT(TR_THREAD, TR_LEVEL_2, ("dispatching thread:%d", tcb->id));
  105.  
  106.     /*
  107.      *    save the state of the current thread
  108.      */
  109.     Active->state = threadState;
  110.  
  111.     /*
  112.      *    jump to the new routine
  113.      */
  114.     threadSwitch(tcb);
  115.     TRPRINT(TR_THREAD, TR_LEVEL_2, ("thread:%d returned from longjmp", Active->id));
  116.  
  117.     /*
  118.      *    return the error code
  119.      */
  120.     return(Active->error);
  121. }
  122.